home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1999 …ember: Reference Library / Apple Developer Reference Library (December 1999) (Disk 1).iso / pc / technical documentation / develop / develop issue 29 / develop issue 29 code / newton web server / nhttpd Ä / inet errors < prev    next >
Encoding:
Text File  |  1996-07-03  |  7.8 KB  |  182 lines
  1. //Errors for the newton Internet package
  2. // Copyright 1995, 1996 Apple Computer, Inc.
  3. // Alpha release, January 18, 1996
  4.  
  5. // InetTool Errors
  6.  
  7. constant  kInetToolErrBindFailed                := -60001;
  8. constant  kInetToolErrIPBindFailed                := -60002;
  9. constant  kInetToolErrPushModule                := -60004;
  10. constant  kInetToolErrIlink                        := -60005;
  11. constant  kInetToolErrNetActivateReq            := -60006;
  12. constant  kInetToolErrTCPBind                    := -60007;
  13. constant  kInetToolErrGetRequest                := -60008;
  14. constant  kInetToolErrPutRequest                := -60009;
  15. constant  kInetToolErrConnect                    := -60010;
  16. constant  kInetToolErrDlAttach                    := -60011;
  17. constant  kInetToolErrBind                        := -60012;
  18. constant  kInetToolErrOpenLink                    := -60013;
  19. constant  kInetToolErrUnlink                        := -60014;
  20. constant  kInetToolErrOutOfPhase                := -60015;
  21. constant  kInetToolErrAddRoute                    := -60016;
  22. constant  kInetToolErrListen                        := -60017;
  23. constant  kInetToolErrLinkNotOpened            := -60018;
  24. constant  kInetToolErrDriverNotOpened            := -60019;
  25. constant  kInetToolErrStreamNotOpened            := -60020;
  26. constant  kInetToolErrBindReqFailed            := -60021;
  27. constant  kInetToolErrConnResReqFailed        := -60022;
  28. constant  kInetToolErrUnexpectedMgmntEvent    := -60058;
  29.  
  30. // Following errors are mapped to the errors reported from the top of the
  31. // stack and are reported to the glue code and in some cases to the client
  32.  
  33. constant  kInetToolErrMemAlloc                                := -60023;
  34. constant  kInetToolErrMsgType                                := -60024;
  35. constant  kInetToolErrNoDevice                                := -60025;
  36. constant  kInetToolErrllegalOpenOnStream                    := -60026;
  37. constant  kInetToolErrReqInInvalidState                    := -60027;
  38. constant  kInetToolErrPrimitiveTooSmall                    := -60028;
  39. constant  kInetToolErrPrimitiveOutOfRange                := -60029;
  40. constant  kInetToolErrPrimitiveOnInvalidStr                := -60030;
  41. constant  kInetToolErrMessageTooLong                        := -60031;
  42. constant  kInetToolErrNetworkAlreadyActive                := -60032;
  43. constant  kInetToolErrNetworkNumberInvalid                := -60033;
  44. constant  kInetToolErrUnsupportedIoctl                    := -60034;
  45. constant  kInetToolErrStreamAlreadyAttached                := -60035;
  46. constant  kInetToolErrUnknownMuxIndex                        := -60036;
  47. constant  kInetToolErrNetworkIsInactive                    := -60037;
  48. constant  kInetToolErrBogusConnection                        := -60038;
  49. constant  kInetToolErrInvalidBillingMode                    := -60039;
  50. constant  kInetToolErrNoTrigSelectedInAlarm                := -60040;
  51. constant  kInetToolErrInvalidTrigSize                        := -60041;
  52. constant  kInetToolErrInvalidConnectionRef                := -60042;
  53. constant  kInetToolErrIlegalMdataInPrim                    := -60043;
  54. constant  kInetToolErrMissingMdataInPrim                    := -60044;
  55. constant  kInetToolErrInvalidSegmentedPrim                := -60045;
  56. constant  kInetToolErrInvalidNPIVersion                    := -60046;
  57. constant  kInetToolErrInvalidAddress                        := -60047;
  58. constant  kInetToolErrOutOfTCPPortNumbers                := -60048;
  59. constant  kInetToolErrSocketInUse                            := -60049;
  60. constant  kInetToolErrReservedPortNumber                    := -60050;
  61. constant  kInetToolErrExpDataNotSupported                := -60051;
  62.  
  63. // TPI errors related to UDP
  64.  
  65. constant  kInetToolErrRedundentRequest                    := -60052;
  66.  
  67. constant  kInetToolErrUnexpectedDLPrim                    := -60053;
  68. constant  kInetToolErrUnexpectedTPIPrim                    := -60054;
  69. constant  kInetToolErrUnexpectedNPIPrim                    := -60055;
  70. constant  kInetToolErrUnknownTPIErrorCode                := -60056;
  71.  
  72. // Events to the client
  73.  
  74. constant  kInetErrStreamInoperative                        := -60057;
  75.  
  76. // Errors related to network status events on PPP's management stream
  77.  
  78. constant  kInetErrLinkActivationNotCofirmed                := -60059;
  79. constant  kInetErrLinkDeactivationNotCofirmed            := -60060;
  80. constant  kInetErrLinkTerminateAckNotReceived            := -60061;
  81. constant  kInetErrNetworkDifferentFromTheReq            := -60062;
  82. constant  kInetErrConnLossFromTerminateRequest         := -60063;
  83. constant  kInetErrConnLossFromTerminateAck                 := -60063;
  84. constant  kInetErrConnLossFromConfigureRequest            := -60064;
  85. constant  kInetErrConnLossFromConfigureReject            := -60065;
  86. constant  kInetErrConnLossFromConfigureAck                := -60066;
  87. constant  kInetErrConnLossFromConfigureNack                := -60067;
  88. constant  kInetErrConnLossFromCodeReject                    := -60068;
  89. constant  kInetErrConnLossFromMaxSetUpAttempts            := -60069;
  90. constant  kInetErrConnLossFromMandatoryFrameSize        := -60070;
  91. constant  kInetErrConnLossFromMandatoryAuthRej            := -60071;
  92. constant  kInetErrConnLossFromRemoteInitAuthFail        := -60072;
  93. constant  kInetErrConnLossFromLocalInitAuthFail        := -60073;
  94. constant  kInetErrConnLossFromLowerLinkFailure            := -60074;
  95. constant  kInetErrConnLossUnspecifiedReason                := -60075;
  96. constant  kInetErrConnLossFromMaxRemoteInitAuthFail    := -60076;
  97. constant  kInetErrConnLossFromMaxLocalInitAuthFail    := -60077;
  98. constant  kInetErrConnLossFromMngmntDeactivation        := -60078;
  99. constant  kInetErrConnLossFromNoIpAddr                    := -60079;
  100.  
  101. constant  kInetToolErrDataLinkLevel                        := -60080;
  102. constant  kInetToolErrSubsBind                                := -60081;
  103. constant  kInetToolErrNetDeActivateReq                    := -60082;
  104. constant  kInetToolErrNetworkLevel                            := -60083;
  105.  
  106.  
  107. //Link Controller err range: -60500 to -60999
  108.  
  109. constant  kInetErrNoSuchLinkID                := -60501;
  110. //constant  kInetErrBadTargetServiceOpt         := -60502;
  111. //constant  kInetErrNoUnderlyingTool            :=    -60503;
  112. constant  kInetErrLinkDisconnected                := -60504;
  113. constant  kInetErrConnectLinkFailed         :=    -60505;
  114.  
  115.  
  116. //DNSTool err base is -60750 (to 60999)
  117.  
  118. constant     kDNSErrNoAnswerFoundYet             :=    -60751; //no answer to a given question has yet been found
  119. constant  kDNSErrInternalErr                     :=    -60752; //some kind of internal DNS tool failure
  120. constant  kDNSErrNameSyntaxErr                :=    -60791; //bad name in DNS request...
  121. constant  kDNSErrNoNameServer                    :=    -60794; //no name server defined with an opt
  122. constant     KDNSErrAuthNameErr                    :=    -60795; //authoritative nonexistent domain error
  123. constant  kDNSErrNoAnswerErr                    :=    -60796; //no answers available for request..could be nonexistent domain
  124. constant     kDNSErrNonexistentDomain            :=    -60797; //the domain name give in the request does not exist
  125. constant  kDNSErrOutOfMemory                    :=    -60798; //DNS tool ran out of memory
  126. constant  kDNSErrCouldNotContactServer        := -60800; //couldn't connect to the current DNS server
  127. constant     kDNSErrNoServersAvailable            := -60801; //couldn't connect to any of the DNS servers in our list
  128. constant  kDNSErrNoResponseFromServer        :=    -60814; //no response from the current server
  129. constant  kDNSErrNoResponseFromAnyServer     :=    -60815; //no response from any of the DNS servers we can query // 1355512
  130.  
  131.  
  132.  
  133. DefConst('kInetErrorTableEnglish, [
  134.     kInetErrNoSuchLinkID,"No link setup is defined",
  135.     kInetErrLinkDisconnected,"Internet Link disconnected",
  136.     kInetErrConnectLinkFailed,"Internet connection failed",
  137.     kInetErrStreamInoperative,"Remote host disconnected the link",
  138.     kInetToolErrOutOfPhase,"PPP Negotiation failed",
  139.     kDNSErrNonexistentDomain,"The domain name does not exist",
  140.     kDNSErrNoResponseFromServer,"No response from the name server",
  141.     0,nil,    // must leave this at the end !!
  142.     ]);
  143.  
  144. // To localize the error table, you can locObj the whole array and not bother to define all those
  145. // symbols....
  146. SetLocalizationFrame({english: '{}});
  147.  
  148. DefConst('kInetErrorTable,Locobj(kInetErrorTableEnglish,'errorstrings));
  149. // This requires a localization frame be defined like this: SetLocalizationFrame({english: '{}});
  150.  
  151. // returns a string for a given error 
  152. DefConst('kGetInetErrorStr, func(error)
  153.     begin
  154.         local errStr := TableLookup(kInetErrorTable, error);
  155.         if not errStr then
  156.             errStr := TableLookup(ROM_errortable, error);
  157.         if not errStr then
  158.             errStr := "Internet Error " & NumberStr(error);   // 1355042 1355899
  159.         errStr;
  160.     end);
  161.  
  162. // extracts the error number from an exception
  163. DefConst('kGetExceptionError, func(exception) 
  164.     begin
  165.         local errorCode := 0;
  166.  
  167.         if HasSlot(exception, 'error) then
  168.             errorCode := exception.error;
  169.  
  170.         else if classof(exception.data) = 'int then
  171.             errorCode := exception.data
  172.         else if IsFrame(exception.data) and HasSlot(exception.data, 'errorCode) then
  173.             errorCode := exception.data.errorCode;
  174.  
  175.         else
  176.             // unknown exception
  177.             errorCode := -1;
  178.         return errorCode;
  179.     end);
  180.  
  181.  
  182.